﻿Public Class altaOrdenRMA

    Private Sub btnConsulta_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnConsulta.Click


        consultaVenta.ShowDialog()

    End Sub

    Private Sub altaOrdenRMA_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        'ToolStripStatusLabel1.Text = "Ingrese No. de venta y presione Consultar"
        DateTimePicker1.Value = System.DateTime.Now
    End Sub

    Private Sub btnCancelar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnCancelar.Click

        Me.Close()

    End Sub

    Private Sub txtNoVta_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles txtNoVta.KeyPress
        validarInt(e)
    End Sub

    Private Sub txtCant_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles txtCant.KeyPress
        validarInt(e)
    End Sub

    Private Sub txtNroRMA_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles txtNroRMA.KeyPress
        validarInt(e)
    End Sub

End Class